home *** CD-ROM | disk | FTP | other *** search
- ; -------------------------------------------------------------------------
- ; ----------- EasyCODE(SPX) - Configuration for FoxPro ------------------
- ; -------------------------------------------------------------------------
-
- [GenOptions]
- InitialIndent=0
- CompressBlanks=no
- GenFileExt=PRG
- MaxIndent=-1
- MaxLineLength=-1
-
- [Settings]
- SourceFileFormat=ANSI
-
- [ParseOptions]
- Parser=easy-xbs.dll
- SuppressDoInProcedureCall=yes
- SuppressLastReturnInProcedure=yes
-
- [AvailableConstructs]
- Statement=yes
- If=yes
- Switch=yes
- Case=no
- For=yes
- While=yes
- Repeat=yes
- Loop=yes
- Exit=yes
- Procedure=yes
- Call=yes
- Function=yes
- Block=yes
- Frame=yes
- Condition=yes
- And=yes
- Or=yes
- Not=yes
-
- [InsertMenuStrings]
- ;Statement=
- ;If=
- Switch="D&O CASE"
- When=" &CASE"
- ;Case=
- ;Of=
- ;For=
- While="DO &WHILE"
- ;Repeat=
- ;Loop=
- ;Exit=
- Procedure=&PROCEDURE
- Call=DO
- Function=F&UNCTION
- ;Block=
- ;Frame=
- ;Condition=
- ;And=
- ;Or=
- ;Not=
-
- [EncloseMenuStrings]
- ;If=
- ;Then=
- ;Else=
- Switch="DO &CASE"
- When=&CASE
- WhenNone=&OTHERWISE
- ;Case=
- ;Of=
- ;Otherwise=
- ;For=
- While="DO &WHILE"
- ;Repeat=
- ;Loop=
- ;Exit=
- Procedure=&PROCEDURE
- Function=F&UNCTION
- ;Block=
- ;Frame=
- ;Condition=
- ;And=
- ;Or=
- ;Not=
-
- [KeywordStrings]
- If=IF
- Then=THEN
- Else=ELSE
- Switch="DO CASE"
- ;FirstWhen=
- When=CASE
- WhenNone=OTHERWISE
- ;Case=
- ;FirstOf=
- ;Of=
- ;Otherwise=
- For=FOR
- While="DO WHILE"
- Repeat=REPEAT
- Loop=LOOP
- Exit=EXIT
- Procedure=PROCEDURE
- Function=FUNCTION
- ;Block=
- And=AND
- Or=OR
- Not=NOT
-
- [MetaStrings]
- ;SegmentHeader=
- ;Statement=
- ;Condition=
- ;Expression=
- ;Value=
- ;ForStatement=
- ;ProcedureHeader=
- ;ProcedureCall=
- ;FunctionHeader=
- ;BlockComment=
- ;FrameHeader=
- ;FrameFooter=
-
- [GenStrings]
- Statement=''
- EndStatement='\N'
-
- If='\NIF \3+'
- ThenBody='\N'
- ElseBody='\N\3-ELSE\3+\n'
- EmptyElseBody=''
- EndIf='\N\3-ENDIF\n'
-
- Switch='\NDO CASE\n\3+'
- FirstWhen='\NCASE \5+'
- FurtherWhen='\N\3-CASE \5+'
- WhenBody='\N\2-'
- WhenNoneBody='\N\3-OTHERWISE\n\3+'
- EmptyWhenNoneBody='\N'
- EndSwitch='\N\6-ENDCASE\n'
-
- ; Warning!
- ; The GenStrings Case, FirstOf, FurtherOf, OfBody,
- ; OtherwiseBody und EmptyOtherwiseBody are not provided,
- ; because the CASE construct is not supported by FoxPro.
- ; Please use the SWITCH construct instead!
- ; Due to the GenString EndCase you will find the following hint
- ; in the generated source program:
- EndCase='\s\0:\n\nWarning! CASE construct not allowed.\n\n\r'
-
- For='\NFOR \4+'
- ForBody='\N\2-'
- EndFor='\N\2-ENDFOR\n'
-
- While='\NDO WHILE \9+'
- WhileBody='\N\7-'
- EndWhile='\N\2-ENDDO\n'
-
- Repeat='\NDO WHILE .T.\n\3+'
- Until='\NIF \3+'
- EndRepeat='\NEXIT\n\3-ENDIF\n\3-ENDDO\n'
-
- Loop='\NDO WHILE .T.\n\3+'
- EndLoop='\N\3-ENDDO\n'
-
- Exit='\NIF \3+'
- EndExit='\NEXIT\n\3-ENDIF\n'
-
- Procedure='\NPROCEDURE \10+'
- ProcedureBody='\N\7-'
- EndProcedure='\N\3-RETURN\n'
-
- Call='\NDO \3+'
- EndCall='\n\3-'
-
- Function='\NFUNCTION \9+'
- FunctionBody='\N\6-'
- EndFunction='\N\3-RETURN\n'
-
- Block='\N* \"\n\i* "'
- BlockBody='\N\2+'
- EndBlock='\N\2-'
-
- Frame='\N'
- FrameBody='\N\3+'
- EndFrameBody='\N\3-'
- EndFrame='\N'
-
- BeginAnd=' (\7+'
- And=');\n\7-.AND. (\7+'
- EndAnd=')\7-'
- BeginOr=' (\7+'
- Or=');\n\7-.OR. (\7+'
- EndOr=')\7-'
- BeginNot='.NOT. (\7+'
- EndNot=')\7-'
- Condition=''
- EndCondition=''
-
- Segment='\N* \"n\i* "'
- SegmentBody='\N\2+'
- EndSegment='\N\2-'
-
- TopSegment='* Generated by \%PNAME% V\%PVER% at \%TIME%\n* with \%CFG%\n\n* \"\n* "'
- TopSegmentBody='\n\n'
- EndTopSegment='\N'
-